home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / biblio / tib / inputs / ams3.ttx < prev    next >
Text File  |  1989-03-28  |  12KB  |  149 lines
  1. %ams numeric or alpha flag style
  2. %flag, author, title, etc., volume (date) pages, gov't no., other
  3.  
  4. \Refstd\Citebrackets%set general formats for reference list and citations
  5. \def\Citefont{\bf}\def\Titlefont{\sl}\def\Volfont{\bf}\def\Tomefont{\Reffont}%redefine some fonts
  6.  
  7. \def\journalarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  8.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  9.                 \par\vfil\penalty-200\vfilneg%\filbreak
  10.       \if\Ftest\present\Flagstyle\Fstr\fi%
  11.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }\fi%
  12.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  13.          \if\etest\present\hskip.2em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  14.           \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
  15.            \if\Vtest\present\if\Jtest\present\hskip.2em\else\Comma\fi\bgroup\Volfont\Vstr\egroup\def\Comma{, }\fi%
  16.             \if\Dtest\present\hskip.2em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
  17.              \if\Ptest\present\bgroup, \Pstr\egroup\def\Comma{, }\fi%
  18.               \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
  19.                \if\jtest\present\Comma\bgroup\Tomefont\jstr\/\egroup\def\Comma{, }\fi%
  20.                 \if\vtest,\present\if\jtest\present\hskip.2em\else\Comma\fi\bgroup\Volfont\vstr\egroup\def\Comma{, }\fi%
  21.                  \if\dtest\present\hskip.2em(\bgroup\dstr\egroup)\def\Comma{, }\fi%
  22.                   \if\ptest\present\bgroup, \pstr\egroup\def\Comma{, }\fi%
  23.                    \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  24.                     \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
  25.                      \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
  26.                       \vskip3ptplus1ptminus1pt}%\smallskip
  27.  
  28. \def\conferencereportformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  29.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  30.                 \par\vfil\penalty-200\vfilneg%\filbreak
  31.       \if\Ftest\present\Flagstyle\Fstr\fi%
  32.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }\fi%
  33.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  34.          \if\Jtest\present\Comma\bgroup\Tomefont\Jstr\/\egroup\def\Comma{, }\fi%
  35.           \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  36.            \if\Dtest\present\hskip.2em(\bgroup\Dstr\egroup)\def\Comma{, }\fi%
  37.             \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
  38.              \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
  39.               \vskip3ptplus1ptminus1pt}%\smallskip
  40.  
  41. \def\bookarticleformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  42.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  43.                 \par\vfil\penalty-200\vfilneg%\filbreak
  44.       \if\Ftest\present\Flagstyle\Fstr\fi%
  45.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }\fi%
  46.         \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  47.          \if\etest\present\hskip.2em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  48.           \if\Btest\present\Comma in \bgroup\Tomefont\Bstr\/\egroup\def\Comma{\unskip, }\fi%
  49.            \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
  50.             \if\Etest\present\Comma\bgroup\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }\fi%
  51.              \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
  52.               \if\Vtest\present\Comma vol. \bgroup\Vstr\egroup\def\Comma{, }\fi%
  53.                \if\Ntest\present\Comma no. \bgroup\Nstr\egroup\def\Comma{, }\fi%
  54.                 \if\Itest\present\Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  55.                  \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  56.                   \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  57.                    \if\Ptest\present\Comma\Pstr\def\Comma{, }\fi%
  58.                     \if\ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  59.                      \if\btest\present\Comma in \bgroup\Tomefont\bstr\egroup\def\Comma{, }\fi%
  60.                        \if\atest\present\Comma\bgroup\astr\egroup\unskip, \if\acnt\present eds.\else ed.\fi\def\Comma{, }\fi%
  61.                         \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
  62.                          \if\vtest\present\Comma vol. \bgroup\vstr\egroup\def\Comma{, }\fi%
  63.                           \if\ntest\present\Comma no. \bgroup\nstr\egroup\def\Comma{, }\fi%
  64.                            \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  65.                             \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  66.                              \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  67.                               \if\ptest\present\Comma\pstr\def\Comma{, }\fi%
  68.                                \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  69.                                 \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
  70.                                  \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
  71.                                   \vskip3ptplus1ptminus1pt}%\smallskip
  72.  
  73. \def\bookformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  74.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  75.                 \par\vfil\penalty-200\vfilneg%\filbreak
  76.       \if\Ftest\present\Flagstyle\Fstr\fi%
  77.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }%
  78.             \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }%
  79.                   \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{, }\fi\fi\fi%
  80.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\/\egroup\def\Comma{\unskip, }%
  81.                 \else\if\Btest\present\Comma\bgroup\Titlefont\Bstr\/\egroup\def\Comma{\unskip, }\fi\fi%
  82.             \if\otest\present\ \bgroup\ostr\egroup\def\Comma{, }\fi%
  83.              \if\etest\present\hskip.2em(\bgroup\estr\egroup)\def\Comma{\unskip, }\fi%
  84.               \if\Stest\present\Comma\bgroup\Sstr\egroup\def\Comma{, }\fi%
  85.                \if\Vtest\present\Comma vol. \bgroup\Vstr\egroup\def\Comma{, }\fi%
  86.                 \if\Ntest\present\Comma no. \bgroup\Nstr\egroup\def\Comma{, }\fi%
  87.                  \if\Atest\present\if\Itest\present
  88.                          \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi%
  89.                       \else\if\Etest\present\if\Itest\present
  90.                               \Comma\bgroup\Istr\egroup\def\Comma{\unskip, }\fi\fi\fi%
  91.                      \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  92.                       \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  93.                        \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }%
  94.                              \else\if\btest\present\Comma\bgroup\Titlefont\bstr\egroup\def\Comma{, }\fi\fi%
  95.                           \if\stest\present\Comma\bgroup\sstr\egroup\def\Comma{, }\fi%
  96.                            \if\vtest\present\Comma vol. \bgroup\vstr\egroup\def\Comma{, }\fi%
  97.                             \if\ntest\present\Comma no. \bgroup\nstr\egroup\def\Comma{, }\fi%
  98.                              \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  99.                               \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  100.                                \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  101.                                 \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  102.                                  \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
  103.                                   \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
  104.                                    \vskip3ptplus1ptminus1pt}%\smallskip
  105.  
  106. \def\technicalreportformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  107.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  108.                 \par\vfil\penalty-200\vfilneg%\filbreak
  109.       \if\Ftest\present\Flagstyle\Fstr\fi%
  110.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }%
  111.             \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }%
  112.                   \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{, }\fi\fi\fi%
  113.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  114.            \if\Atest\present\if\Itest\present
  115.                    \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  116.                 \else\if\Etest\present\if\Itest\present
  117.                         \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
  118.             \if\Rtest\present\Comma\bgroup\Rstr\egroup\def\Comma{, }\fi%
  119.              \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  120.               \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  121.                \if\ttest\present\Comma\bgroup\Titlefont\tstr\egroup\def\Comma{, }\fi%
  122.                 \if\itest\present\Comma\bgroup\istr\egroup\def\Comma{, }\fi%
  123.                  \if\rtest\present\Comma\bgroup\rstr\egroup\def\Comma{, }\fi%
  124.                   \if\ctest\present\Comma\bgroup\cstr\egroup\def\Comma{, }\fi%
  125.                    \if\dtest\present\Comma\bgroup\dstr\egroup\def\Comma{, }\fi%
  126.                     \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  127.                      \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
  128.                       \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
  129.                        \vskip3ptplus1ptminus1pt}%\smallskip
  130.  
  131. \def\otherformat{\Reffont\let\uchyph=1\parindent=1.25pc\def\Comma{}%
  132.                 \sfcode`\.=1000\sfcode`\?=1000\sfcode`\!=1000\sfcode`\:=1000\sfcode`\;=1000\sfcode`\,=1000%\frenchspacing
  133.                 \par\vfil\penalty-200\vfilneg%\filbreak
  134.       \if\Ftest\present\Flagstyle\Fstr\fi%
  135.        \if\Atest\present\bgroup\Authfont\Astr\egroup\def\Comma{\unskip, }%
  136.             \else\if\Etest\present\bgroup\def\Eand{\Aand}\def\Eandd{\Aandd}\Authfont\Estr\egroup\unskip, \ifnum\Ecnt>1eds.\else ed.\fi\def\Comma{, }%
  137.                   \else\if\Itest\present\bgroup\Authfont\Istr\egroup\def\Comma{, }\fi\fi\fi%
  138.           \if\Ttest\present\Comma\bgroup\Titlefont\Tstr\egroup\def\Comma{, }\fi%
  139.             \if\Atest\present\if\Itest\present
  140.                     \Comma\bgroup\Istr\egroup\def\Comma{, }\fi%
  141.                  \else\if\Etest\present\if\Itest\present
  142.                          \Comma\bgroup\Istr\egroup\def\Comma{, }\fi\fi\fi%
  143.                  \if\Ctest\present\Comma\bgroup\Cstr\egroup\def\Comma{, }\fi%
  144.                   \if\Dtest\present\Comma\bgroup\Dstr\egroup\def\Comma{, }\fi%
  145.                    \if\Gtest\present{\Comma Gov't ordering no. }\bgroup\Gstr\egroup\def\Comma{, }\fi%
  146.                     \if\Mtest\present\Comma MR \#\bgroup\Mstr\egroup\def\Comma{, }\fi%
  147.                      \if\Otest\present{\Comma\bgroup\Ostr\egroup.}\else{.}\fi%
  148.                       \vskip3ptplus1ptminus1pt}%\smallskip
  149.